; Use two dashes for internal function minibuffer-visible-completions--bind

* lisp/minibuffer.el (minibuffer-visible-completions--bind):
Rename from minibuffer-visible-completions-bind.
(minibuffer-visible-completions-map): Rename
minibuffer-visible-completions-bind to
minibuffer-visible-completions--bind.

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 0a844c538b4012f7deec7b92a890729d40d54aa3..b007320b11017e0a6db43b026a46c498bf7799ad 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -3180,7 +3180,7 @@ and `RET' accepts the input typed into the minibuffer."
                    t))
         cmd))))
 
-(defun minibuffer-visible-completions-bind (binding)
+(defun minibuffer-visible-completions--bind (binding)
   "Use BINDING when completions are visible.
 Return an item that is enabled only when a window
 displaying the *Completions* buffer exists."
@@ -3190,12 +3190,12 @@ displaying the *Completions* buffer exists."
 
 (defvar-keymap minibuffer-visible-completions-map
   :doc "Local keymap for minibuffer input with visible completions."
-  "<left>"  (minibuffer-visible-completions-bind #'minibuffer-previous-completion)
-  "<right>" (minibuffer-visible-completions-bind #'minibuffer-next-completion)
-  "<up>"    (minibuffer-visible-completions-bind #'minibuffer-previous-line-completion)
-  "<down>"  (minibuffer-visible-completions-bind #'minibuffer-next-line-completion)
-  "RET"     (minibuffer-visible-completions-bind #'minibuffer-choose-completion-or-exit)
-  "C-g"     (minibuffer-visible-completions-bind #'minibuffer-hide-completions))
+  "<left>"  (minibuffer-visible-completions--bind #'minibuffer-previous-completion)
+  "<right>" (minibuffer-visible-completions--bind #'minibuffer-next-completion)
+  "<up>"    (minibuffer-visible-completions--bind #'minibuffer-previous-line-completion)
+  "<down>"  (minibuffer-visible-completions--bind #'minibuffer-next-line-completion)
+  "RET"     (minibuffer-visible-completions--bind #'minibuffer-choose-completion-or-exit)
+  "C-g"     (minibuffer-visible-completions--bind #'minibuffer-hide-completions))
 \f
 ;;; Completion tables.